home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1994 July / 1994-07b.d64 / run read (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  117b  |  6 lines

  1. 10 rem this reads in input line into x$
  2. 20 rem
  3. 30 x=512:x$=""
  4. 40 ifpeek(x)thenx$=x$+chr$(peek(x)):x=x+1:goto40
  5. 50 printchr$(34)x$chr$(34)
  6.